home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1995 May / PC Answers CD-ROM 7 (Future Publishing) (May 1995).iso / vbits / code / appleman / picprint.bas < prev    next >
Encoding:
BASIC Source File  |  1994-10-06  |  8.2 KB  |  268 lines
  1. ' Here's a type definition to hold a DIB
  2. Type DIBSTRUCT
  3.     bminfo As String    ' Contains header and palette
  4.     bmdata As Integer
  5. End Type
  6.  
  7.  
  8.  
  9. ' Global constants
  10.  
  11. Global Const SRCCOPY = &HCC0020
  12. Global Const SRCPAINT = &HEE0086
  13. Global Const SRCAND = &H8800C6
  14. Global Const SRCINVERT = &H660046
  15. Global Const SRCERASE = &H440328
  16. Global Const NOTSRCCOPY = &H330008
  17. Global Const NOTSRCERASE = &H1100A6
  18. Global Const MERGECOPY = &HC000CA
  19. Global Const MERGEPAINT = &HBB0226
  20. Global Const PATCOPY = &HF00021
  21. Global Const PATPAINT = &HFB0A09
  22. Global Const PATINVERT = &H5A0049
  23. Global Const DSTINVERT = &H550009
  24. Global Const BLACKNESS = &H42&
  25. Global Const WHITENESS = &HFF0062
  26. Global Const BLACKONWHITE = 1
  27. Global Const WHITEONBLACK = 2
  28. Global Const COLORONCOLOR = 3
  29. Global Const NEWFRAME = 1
  30. Global Const ABORTDOCCONST = 2
  31. Global Const NEXTBAND = 3
  32. Global Const SETCOLORTABLE = 4
  33. Global Const GETCOLORTABLE = 5
  34. Global Const FLUSHOUTPUT = 6
  35. Global Const DRAFTMODE = 7
  36. Global Const QUERYESCSUPPORT = 8
  37. Global Const SETABORTPROCCONST = 9
  38. Global Const STARTDOCCONST = 10
  39. Global Const ENDDOCAPICONST = 11
  40. Global Const GETPHYSPAGESIZE = 12
  41. Global Const GETPRINTINGOFFSET = 13
  42. Global Const GETSCALINGFACTOR = 14
  43. Global Const MFCOMMENT = 15
  44. Global Const GETPENWIDTH = 16
  45. Global Const SETCOPYCOUNT = 17
  46. Global Const SELECTPAPERSOURCE = 18
  47. Global Const DEVICEDATA = 19
  48. Global Const PASSTHROUGH = 19
  49. Global Const GETTECHNOLGY = 20
  50. Global Const GETTECHNOLOGY = 20
  51. Global Const SETENDCAP = 21
  52. Global Const SETLINEJOIN = 22
  53. Global Const SETMITERLIMIT = 23
  54. Global Const BANDINFO = 24
  55. Global Const DRAWPATTERNRECT = 25
  56. Global Const GETVECTORPENSIZE = 26
  57. Global Const GETVECTORBRUSHSIZE = 27
  58. Global Const ENABLEDUPLEX = 28
  59. Global Const GETSETPAPERBINS = 29
  60. Global Const GETSETPRINTORIENT = 30
  61. Global Const ENUMPAPERBINS = 31
  62. Global Const SETDIBSCALING = 32
  63. Global Const EPSPRINTING = 33
  64. Global Const ENUMPAPERMETRICS = 34
  65. Global Const GETSETPAPERMETRICS = 35
  66. Global Const POSTSCRIPT_DATA = 37
  67. Global Const POSTSCRIPT_IGNORE = 38
  68. Global Const GETEXTENDEDTEXTMETRICS = 256
  69. Global Const GETEXTENTTABLE = 257
  70. Global Const GETPAIRKERNTABLE = 258
  71. Global Const GETTRACKKERNTABLE = 259
  72. Global Const EXTTEXTOUTCONST = 512
  73. Global Const ENABLERELATIVEWIDTHS = 768
  74. Global Const ENABLEPAIRKERNING = 769
  75. Global Const SETKERNTRACK = 770
  76. Global Const SETALLJUSTVALUES = 771
  77. Global Const SETCHARSET = 772
  78. Global Const STRETCHBLTCONST = 2048
  79. Global Const BEGIN_PATH = 4096
  80. Global Const CLIP_TO_PATH = 4097
  81. Global Const END_PATH = 4098
  82. Global Const EXT_DEVICE_CAPS = 4099
  83. Global Const RESTORE_CTM = 4100
  84. Global Const SAVE_CTM = 4101
  85. Global Const DM_ORIENTATION = &H1&
  86. Global Const DM_PAPERSIZE = &H2&
  87. Global Const DM_PAPERLENGTH = &H4&
  88. Global Const DM_PAPERWIDTH = &H8&
  89. Global Const DM_SCALE = &H10&
  90. Global Const DM_COPIES = &H100&
  91. Global Const DM_DEFAULTSOURCE = &H200&
  92. Global Const DM_PRINTQUALITY = &H400&
  93. Global Const DM_COLOR = &H800&
  94. Global Const DM_DUPLEX = &H1000&
  95. Global Const DM_YRESOLUTION = &H2000&
  96. Global Const DM_TTOPTION = &H4000&
  97. Global Const DMORIENT_PORTRAIT = 1
  98. Global Const DMORIENT_LANDSCAPE = 2
  99. Global Const DMPAPER_LETTER = 1
  100. Global Const DMPAPER_LETTERSMALL = 2
  101. Global Const DMPAPER_TABLOID = 3
  102. Global Const DMPAPER_LEDGER = 4
  103. Global Const DMPAPER_LEGAL = 5
  104. Global Const DMPAPER_STATEMENT = 6
  105. Global Const DMPAPER_EXECUTIVE = 7
  106. Global Const DMPAPER_A3 = 8
  107. Global Const DMPAPER_A4 = 9
  108. Global Const DMPAPER_A4SMALL = 10
  109. Global Const DMPAPER_A5 = 11
  110. Global Const DMPAPER_B4 = 12
  111. Global Const DMPAPER_B5 = 13
  112. Global Const DMPAPER_FOLIO = 14
  113. Global Const DMPAPER_QUARTO = 15
  114. Global Const DMPAPER_10X14 = 16
  115. Global Const DMPAPER_11X17 = 17
  116. Global Const DMPAPER_NOTE = 18
  117. Global Const DMPAPER_ENV_9 = 19
  118. Global Const DMPAPER_ENV_10 = 20
  119. Global Const DMPAPER_ENV_11 = 21
  120. Global Const DMPAPER_ENV_12 = 22
  121. Global Const DMPAPER_ENV_14 = 23
  122. Global Const DMPAPER_CSHEET = 24
  123. Global Const DMPAPER_DSHEET = 25
  124. Global Const DMPAPER_ESHEET = 26
  125. Global Const DMPAPER_ENV_DL = 27
  126. Global Const DMPAPER_ENV_C5 = 28
  127. Global Const DMPAPER_ENV_C3 = 29
  128. Global Const DMPAPER_ENV_C4 = 30
  129. Global Const DMPAPER_ENV_C6 = 31
  130. Global Const DMPAPER_ENV_C65 = 32
  131. Global Const DMPAPER_ENV_B4 = 33
  132. Global Const DMPAPER_ENV_B5 = 34
  133. Global Const DMPAPER_ENV_B6 = 35
  134. Global Const DMPAPER_ENV_ITALY = 36
  135. Global Const DMPAPER_ENV_MONARCH = 37
  136. Global Const DMPAPER_ENV_PERSONAL = 38
  137. Global Const DMPAPER_FANFOLD_US = 39
  138. Global Const DMPAPER_FANFOLD_STD_GERMAN = 40
  139. Global Const DMPAPER_FANFOLD_LGL_GERMAN = 41
  140. Global Const DMPAPER_USER = 256
  141. Global Const DMBIN_UPPER = 1
  142. Global Const DMBIN_ONLYONE = 1
  143. Global Const DMBIN_LOWER = 2
  144. Global Const DMBIN_MIDDLE = 3
  145. Global Const DMBIN_MANUAL = 4
  146. Global Const DMBIN_ENVELOPE = 5
  147. Global Const DMBIN_ENVMANUAL = 6
  148. Global Const DMBIN_AUTO = 7
  149. Global Const DMBIN_TRACTOR = 8
  150. Global Const DMBIN_SMALLFMT = 9
  151. Global Const DMBIN_LARGEFMT = 10
  152. Global Const DMBIN_LARGECAPACITY = 11
  153. Global Const DMBIN_CASSETTE = 14
  154. Global Const DMBIN_USER = 256
  155. Global Const DMRES_DRAFT = -1
  156. Global Const DMRES_LOW = -2
  157. Global Const DMRES_MEDIUM = -3
  158. Global Const DMRES_HIGH = -4
  159. Global Const DMCOLOR_MONOCHROME = 1
  160. Global Const DMCOLOR_COLOR = 2
  161. Global Const DMDUP_SIMPLEX = 1
  162. Global Const DMDUP_VERTICAL = 2
  163. Global Const DMDUP_HORIZONTAL = 3
  164. Global Const DMTT_BITMAP = 1
  165. Global Const DMTT_DOWNLOAD = 2
  166. Global Const DMTT_SUBDEV = 3
  167. Global Const DM_UPDATE = 1
  168. Global Const DM_COPY = 2
  169. Global Const DM_PROMPT = 4
  170. Global Const DM_MODIFY = 8
  171. Global Const DM_IN_BUFFER = 8
  172. Global Const DM_IN_PROMPT = 4
  173. Global Const DM_OUT_BUFFER = 2
  174. Global Const DM_OUT_DEFAULT = 1
  175. Global Const DC_FIELDS = 1
  176. Global Const DC_PAPERS = 2
  177. Global Const DC_PAPERSIZE = 3
  178. Global Const DC_MINEXTENT = 4
  179. Global Const DC_MAXEXTENT = 5
  180. Global Const DC_BINS = 6
  181. Global Const DC_DUPLEX = 7
  182. Global Const DC_SIZE = 8
  183. Global Const DC_EXTRA = 9
  184. Global Const DC_VERSION = 10
  185. Global Const DC_DRIVER = 11
  186. Global Const DC_BINNAMES = 12
  187. Global Const DC_ENUMRESOLUTIONS = 13
  188. Global Const DC_FILEDEPENDENCIES = 14
  189. Global Const DC_TRUETYPE = 15
  190. Global Const DC_PAPERNAMES = 16
  191. Global Const DC_ORIENTATION = 17
  192. Global Const DC_COPIES = 18
  193. Global Const DCTT_BITMAP = &H1&
  194. Global Const DCTT_DOWNLOAD = &H2&
  195. Global Const DCTT_SUBDEV = &H4&
  196. Global Const SP_NOTREPORTED = &H4000
  197. Global Const SP_ERROR = (-1)
  198. Global Const SP_APPABORT = (-2)
  199. Global Const SP_USERABORT = (-3)
  200. Global Const SP_OUTOFDISK = (-4)
  201. Global Const SP_OUTOFMEMORY = (-5)
  202. Global Const PR_JOBSTATUS = &H0
  203. Global Const DRIVERVERSION = 0
  204. Global Const TECHNOLOGY = 2
  205. Global Const HORZSIZE = 4
  206. Global Const VERTSIZE = 6
  207. Global Const HORZRES = 8
  208. Global Const VERTRES = 10
  209. Global Const BITSPIXEL = 12
  210. Global Const PLANES = 14
  211. Global Const NUMBRUSHES = 16
  212. Global Const NUMPENS = 18
  213. Global Const NUMMARKERS = 20
  214. Global Const NUMFONTS = 22
  215. Global Const NUMCOLORS = 24
  216. Global Const PDEVICESIZE = 26
  217. Global Const CURVECAPS = 28
  218. Global Const LINECAPS = 30
  219. Global Const POLYGONALCAPS = 32
  220. Global Const TEXTCAPS = 34
  221. Global Const CLIPCAPS = 36
  222. Global Const RASTERCAPS = 38
  223. Global Const ASPECTX = 40
  224. Global Const ASPECTY = 42
  225. Global Const ASPECTXY = 44
  226. Global Const LOGPIXELSX = 88
  227. Global Const LOGPIXELSY = 90
  228. Global Const SIZEPALETTE = 104
  229. Global Const NUMRESERVED = 106
  230. Global Const COLORRES = 108
  231. Global Const RC_BITBLT = 1
  232. Global Const RC_BANDING = 2
  233. Global Const RC_SCALING = 4
  234. Global Const RC_BITMAP64 = 8
  235. Global Const RC_GDI20_OUTPUT = &H10
  236. Global Const RC_DI_BITMAP = &H80
  237. Global Const RC_PALETTE = &H100
  238. Global Const RC_DIBTODEV = &H200
  239. Global Const RC_BIGFONT = &H400
  240. Global Const RC_STRETCHBLT = &H800
  241. Global Const RC_FLOODFILL = &H1000
  242. Global Const RC_STRETCHDIB = &H2000
  243. Global Const GMEM_FIXED = &H0
  244. Global Const GMEM_MOVEABLE = &H2
  245. Global Const GMEM_NOCOMPACT = &H10
  246. Global Const GMEM_NODISCARD = &H20
  247. Global Const GMEM_ZEROINIT = &H40
  248. Global Const GMEM_MODIFY = &H80
  249. Global Const GMEM_DISCARDABLE = &H100
  250. Global Const GMEM_NOT_BANKED = &H1000
  251. Global Const GMEM_SHARE = &H2000
  252. Global Const GMEM_DDESHARE = &H2000
  253. Global Const GMEM_NOTIFY = &H4000
  254. Global Const GMEM_LOWER = GMEM_NOT_BANKED
  255. Global Const DIB_RGB_COLORS = 0
  256. Global Const DIB_PAL_COLORS = 1
  257.  
  258. Global Const BI_RGB = 0&
  259.  
  260. Global Const MM_ISOTROPIC = 7
  261. Global Const MM_ANISOTROPIC = 8
  262.  
  263.  
  264. ' Global variables
  265. Global AbortPrinting%
  266. Global UseHourglass%
  267.  
  268.